home *** CD-ROM | disk | FTP | other *** search
- decode_mess:
- output$=""
- rem This routine decrypts our tables in the beginning to useable material
- rem For run-time use only. The data in the exe/com is not decrypted!
- r=len(temp$)
- for x=1 to r
- a$=mid$(temp$,x,1)
- a=asc(a$)
- a=a+127
- a$=chr$(a)
- output$=output$+a$
- next x
- return
-